From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 26 May 1993 17:58:22 +0000 (+0000)
Subject: (make_lispy_event): Fix off-by-1 error with hpos in menu bar.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95943
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=0a9b0670a44263255219f3bfc094f7a24edd106c;p=emacs.git

(make_lispy_event): Fix off-by-1 error with hpos in menu bar.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index fc7d5f4d8cf..a9bb02bb896 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2221,8 +2221,8 @@ make_lispy_event (event)
 		    Lisp_Object pos, string;
 		    pos = Fcdr (Fcdr (Fcar (items)));
 		    string = Fcar (Fcdr (Fcar (items)));
-		    if (XINT (event->x) > XINT (pos)
-			&& XINT (event->x) <= XINT (pos) + XSTRING (string)->size)
+		    if (XINT (event->x) >= XINT (pos)
+			&& XINT (event->x) < XINT (pos) + XSTRING (string)->size)
 		      break;
 		  }
 		position